SetQuickEsc ([lNew]) --> true/false:
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~

Functions:
~~~~~~~~~~
Serves as a switch, if set to true (if returns true), after pressing the
ESC the menu is imediately cancelled, if false the menu is returned one
level up.

Parameter description:
~~~~~~~~~~~~~~~~~~~~~~
lNew: new value to set the switch

Return value:
~~~~~~~~~~~~~
true/false

Example:
~~~~~~~~
    ? SetQuickEsc()        //the value of the switch
    SetQuickEsc(true)      //set the switch to true
    ? SetQuickEsc()        //returns true

Source code is in file  Object3.prg